home *** CD-ROM | disk | FTP | other *** search
/ Dino Crisis Digital Press Kit / Dino Crisis Digital Press Kit.iso / mac / g / 00070_Script_70 < prev    next >
Text File  |  1999-08-31  |  861b  |  35 lines
  1. on mousedown
  2.   global gSoundLevel
  3.   set the soundlevel to 0
  4.   
  5.   
  6.   
  7.   set the visible of sprite 19 to false
  8.   set the visible of sprite 20 to false
  9.   set the visible of sprite 21 to true
  10.   set the visible of sprite 22 to false
  11.   set the visible of sprite 23 to false
  12.   
  13.   repeat while the stilldown
  14.     checkblip
  15.     set the movierate of sprite 10 to -5
  16.     updatestage
  17.   end repeat
  18.   repeat with n = 60 to 74
  19.     puppetsprite n, false
  20.     set the visible of sprite n + 20 to false
  21.   end repeat
  22.   go to "norm"
  23.   
  24. end
  25.  
  26. on mouseup
  27.   global gSoundLevel
  28.   set the visible of sprite 19 to true
  29.   set the visible of sprite 20 to false
  30.   set the visible of sprite 21 to false
  31.   set the visible of sprite 22 to false
  32.   set the visible of sprite 23 to false
  33.   set the movierate of sprite 10 to 1
  34.   set the soundlevel to gSoundLevel
  35. end